object RectangleWindow: TRectangleWindow Left = 617 Top = 81 Width = 163 Height = 153 HorzScrollBar.Tracking = True VertScrollBar.Increment = 60 VertScrollBar.Tracking = True BorderIcons = [biSystemMenu] Caption = 'Rectangle coords:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy PixelsPerInch = 96 TextHeight = 13 object Mouse: TLabel Left = 74 Top = 95 Width = 45 Height = 13 Caption = '(610,234)' end object UpperLeft: TLabel Left = 74 Top = 69 Width = 45 Height = 13 Caption = '(210,320)' end object LowerRight: TLabel Left = 74 Top = 82 Width = 57 Height = 13 Caption = '(1640,1450)' end object Label1: TLabel Left = 6 Top = 95 Width = 38 Height = 13 Caption = 'Mouse=' end object Label2: TLabel Left = 6 Top = 82 Width = 63 Height = 13 Caption = 'Lower Right=' end object Label5: TLabel Left = 6 Top = 69 Width = 56 Height = 13 Caption = 'Upper Left=' end object Label6: TLabel Left = 8 Top = 112 Width = 3 Height = 8 Caption = ' ' end object GroupBox1: TGroupBox Left = 16 Top = 2 Width = 105 Height = 47 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 object Label3: TLabel Left = 12 Top = 13 Width = 37 Height = 13 Caption = 'Width= ' end object Label4: TLabel Left = 12 Top = 26 Width = 40 Height = 13 Caption = 'Height= ' end object RectWidthLabel: TLabel Left = 56 Top = 13 Width = 24 Height = 13 Caption = '1100' Color = clBtnFace ParentColor = False end object RectHeightLabel: TLabel Left = 56 Top = 26 Width = 24 Height = 13 Caption = '1200' Color = clBtnFace ParentColor = False end end end